home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / win / c / winclas.exe / WINCLS.CPP < prev    next >
C/C++ Source or Header  |  1991-07-06  |  1KB  |  44 lines
  1. #include <windows.h>
  2. #include "winclass.hpp"
  3.  
  4.  
  5. long FAR PASCAL wndproc(HANDLE hWnd,unsigned message, WORD wParam,LONG lParam)
  6.     {
  7.          switch (message) {
  8.              case WM_DESTROY :
  9.                     PostQuitMessage(0);
  10.                         break;
  11.                 default: return(DefWindowProc(hWnd,message,wParam,lParam));
  12.                  }
  13.          return NULL;
  14.         }
  15.  
  16. int PASCAL WinMain(HANDLE hInstance,HANDLE hPrevInstance,LPSTR lpCmdLine, int nCmdShow)
  17.     {
  18.          MSG msg;
  19.          OverlappedWindow  Test("Happy Face",hInstance,wndproc);
  20.          OverlappedWindow  test2("Norris",hInstance,wndproc);
  21.          ModalWindow  test3("This is Modal",hInstance,wndproc);
  22.          int windowsopen;
  23.  
  24.          test3.SetInitialSize(100,100);
  25.          test3.Open(nCmdShow);
  26.  
  27.      test2.SetIcon(LoadIcon(hInstance,"NORRIS"));
  28.      test2.Open(nCmdShow);
  29.  
  30.          Test.SetInitialCursor(LoadCursor(NULL,IDC_CROSS));
  31.          Test.SetIcon(LoadIcon(hInstance,"WINDCLASS"));
  32.          Test.Open(nCmdShow);
  33.          windowsopen = 2;
  34.          while (windowsopen > 0)
  35.              {
  36.          while (GetMessage(&msg, NULL,NULL,NULL))
  37.          {
  38.             TranslateMessage(&msg);
  39.             DispatchMessage(&msg);
  40.         }
  41.                 windowsopen--;
  42.                 }
  43.      return msg.wParam;
  44.      }